The IsObject function determines if the expression is an automation object.

Code:
<% Set anyvariable = Server.CreateObject("Scripting.FileSystemObject") %>
<% =IsObject(anyvariable) %>

Output:
True

Code:
<% =IsObject("This is a string, not an object.") %>

Output:
False